﻿Public Class frmListaTutores
    Private objTutorLN As TutorLN
    Private Sub pCargarGrillas()
        Dim lTutores As List(Of TutorEN)
        objTutorLN = New TutorLN
        Dim i As Integer
        lTutores = objTutorLN.fBuscarTutor()
        For i = 0 To lTutores.Count - 1
            Me.dgvTutores.Rows.Add(lTutores.Item(i).NombreTutor + " " + lTutores.Item(i).ApeMaternoTutor + " " + lTutores.Item(i).ApePaternoTutor)
        Next
    End Sub
    Private Sub btnAceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAceptar.Click
        Me.DialogResult = Windows.Forms.DialogResult.OK
    End Sub

    Private Sub frmListaTutores_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        pCargarGrillas()
    End Sub
End Class